#!/bin/csh -f
if ( $DECAHOME != `pwd` ) then
    echo "cding to decahome"
    cd $DECAHOME
endif
if (! -e SRC) then
    echo "Directory SRC does not exist."
    exit
endif
if (! -e SRC_C) then
    echo "Directory SRC_C does not exist."
    exit
endif
echo "./SRC/Makefile" > ddupd.log
echo "./SRC/README.make" >> ddupd.log
find ./SRC -name "*.p" >> ddupd.log
find ./SRC -name "*.awk" >> ddupd.log
find ./SRC -name "*.help" >> ddupd.log
find ./SRC_C -name "*.c" >> ddupd.log
echo "./SRC_C/Makefile" >> ddupd.log
echo "./scripts" >> ddupd.log
echo "./DOC" >> ddupd.log
echo "./DiffData" >> ddupd.log
echo "./INPUT" >> ddupd.log
tar czf ddupd.tgz -T ddupd.log
##

